home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Network Support Library
/
RoseWare - Network Support Library.iso
/
btrieve
/
xtrnws.exe
/
PATCH30.BAT
< prev
next >
Wrap
DOS Batch File
|
1992-09-02
|
4KB
|
161 lines
echo off
CLS
echo *** MAKE SURE THAT YOU USE THE ORIGINAL (UNPATCHED) RELEASED VERSION
echo OF THE PRODUCT YOU ARE PATCHING.
echo PATCH.EXE will not allow you to patch a product that has already
echo been patched.
echo
::
IF %1! == ! GOTO PARAM
IF %1 == XTRDOS GOTO XTRIEVE
IF %1 == XTROS2 GOTO XTRIEVE
IF %1 == DALSVR GOTO DALSVR
IF %1 == BTRIEVE GOTO BTRIEVE
IF %1 == NWSQL250 GOTO NWSQL
IF %1 == NWSQL100 GOTO NWSQL
IF %1 == NWSQL50 GOTO NWSQL
IF %1 == NWSQL20 GOTO NWSQL
IF %1 == NWSQL10 GOTO NWSQL
IF %1 == NWSQL5 GOTO NWSQL
IF %1 == xtrdos GOTO XTRIEVE
IF %1 == xtros2 GOTO XTRIEVE
IF %1 == dalsvr GOTO DALSVR
IF %1 == btrieve GOTO BTRIEVE
IF %1 == nwsql250 GOTO NWSQL
IF %1 == nwsql100 GOTO NWSQL
IF %1 == nwsql50 GOTO NWSQL
IF %1 == nwsql20 GOTO NWSQL
IF %1 == nwsql10 GOTO NWSQL
IF %1 == nwsql5 GOTO NWSQL
GOTO PARAM
::
:XTRIEVE
echo REMINDER:
echo You also need to patch BTRIEVE.NLM and NWSQL.NLM
echo .
::
SET PATCH30=%1.411
SET RTP30=%1.RTP
SET FILE30=XTRIEVE.EXE
SET ORG30=%1.ORG
::
echo NOTE:
echo If you intend to patch both DOS and OS/2 versions of this product, you
echo will need to copy one version to a separate directory after the patch
echo has been applied. Both versions have the same file name and if the
echo patched %FILE30% remains in the same directory it will be overwritten.
echo .
GOTO PATCH
::
:DALSVR
echo REMINDER:
echo You also need to patch BTRIEVE.NLM and NWSQL.NLM
SET PATCH30=%1.100
SET RTP30=%1.RTP
SET FILE30=%1.NLM
SET ORG30=%1.ORG
GOTO PATCH
::
:BTRIEVE
echo REMINDER:
echo You also need to patch NWSQL.NLM
SET PATCH30=%1.600
SET RTP30=%1.RTP
SET FILE30=%1.NLM
SET ORG30=%1.ORG
GOTO PATCH
::
:NWSQL
echo REMINDER:
echo You also need to patch BTRIEVE.NLM
SET PATCH30=%1.300
SET RTP30=%1.RTP
SET FILE30=NWSQL.NLM
SET ORG30=%1.ORG
GOTO PATCH
::
:PATCH
::
ECHO CHECKING FILES ............
::
IF NOT EXIST PATCH.EXE GOTO NOPAT
IF NOT EXIST %PATCH30% GOTO PATERR
IF NOT EXIST %FILE30% GOTO FILERR
IF NOT EXIST %ORG30% REN %FILE30% %ORG30%
:PATORG
::
ECHO PREPARING FILES ...........
::
COPY %ORG30% %FILE30%
COPY %PATCH30% %RTP30%
::
ECHO STARTING PATCH PROCESS ....
::
PATCH %RTP30%
DEL %RTP30%
GOTO FIXED
::
:NOPAT
echo
echo CANNOT FIND PATCH.EXE
echo
echo The Patch Install Utility (PATCH.EXE) is required to install
echo the patches for this product. Please copy PATCH.EXE to the directory
echo you are working in............................................
GOTO END
::
:PATERR
echo
echo CANNOT FIND %PATCH30%
GOTO END
::
:FILERR
IF EXIST %ORG30% GOTO PATORG
echo
echo CANNOT FIND %FILE30%
GOTO END
::
:PARAM
echo
echo THE FORMAT IS:
echo
echo PATCH30 [filename]
echo
echo WHERE [filename] IS:
echo
echo - XTRDOS ......... XTRIEVE for NetWare SQL (DOS version)
echo - XTROS2 ......... XTRIEVE for NetWare SQL (OS/2 version)
echo - DALSVR ......... DALSVR.NLM
echo - BTRIEVE ......... BTRIEVE.NLM
echo - NWSQL250 ......... NWSQL.NLM (250 user version)
echo - NWSQL100 ......... NWSQL.NLM (100 user version)
echo - NWSQL50 ......... NWSQL.NLM (50 user version)
echo - NWSQL20 ......... NWSQL.NLM (20 user version)
echo - NWSQL10 ......... NWSQL.NLM (10 user version)
echo - NWSQL5 ......... NWSQL.NLM (5 user version)
echo
GOTO END
::
:FIXED
echo
echo
echo ***** NOTICE: The %ORG30% file in your current directory is the
echo original. This batch file renames %FILE30% to %ORG30%
echo if it does not find %ORG30%. This will allow you to
echo keep the original on hand without patches applied.
echo The next time the patches are applied, it looks for
echo the %ORG30% file first. Thus, patches will always be
echo applied to the unpatched version.
echo
echo ** If PATCH.EXE returns:
echo 'Invalid copy of file found. No update can be done.'
echo you will need to delete the %ORG30% file and
echo copy the unpatched %FILE30% to this directory.
echo
::
:END
SET PATCH30=
SET RTP30=
SET FILE30=
SET ORG30=